home *** CD-ROM | disk | FTP | other *** search
/ Invisible Universe / Invisible Universe (1995)(Voyager)[Mac-PC].iso / mac / MOVIES / STARMAP.DIR / 00352_Script_352 < prev    next >
Text File  |  1995-11-16  |  795b  |  44 lines
  1. on exitFrame
  2.   global gHelpClick
  3.   
  4.   if rollover(4) then
  5.     puppetsprite 4,true
  6.     set cn = the castNum of sprite 4
  7.     if the name of cast cn = "P" then exit
  8.     
  9.     set the castNum of sprite 4 = cn + 1
  10.     updateStage
  11.     puppetSprite 4, false
  12.     
  13.     set t = the ticks+30
  14.     repeat while t < the ticks
  15.     end repeat
  16.     
  17.     
  18.     repeat while rollover(4)
  19.       if the mouseDown then
  20.         go to the frame-1
  21.         updateStage
  22.         
  23.         repeat while the mouseDown
  24.         end repeat
  25.         
  26.         exit repeat
  27.         
  28.       end if
  29.     end repeat
  30.     
  31.     set gHelpClick = the ticks + 60
  32.   end if
  33.   
  34.   go to the frame
  35.   
  36. end
  37.  
  38. on mouseDown
  39.   global gHelpClick
  40.   if gHelpClick > the ticks then exit
  41.   
  42.   returnFromHelp
  43. end mouseDown
  44.